home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / Aztec C v5.2a disk 4.adf / 204inc_i.lzh / rexx / rexxio.i < prev    next >
Text File  |  1991-03-14  |  3KB  |  77 lines

  1.      IFND      REXX_REXXIO_I
  2. REXX_REXXIO_I SET      1
  3. **
  4. **    $Filename: rexx/rexxio.i $
  5. **    $Release: 2.04 $
  6. **    $Revision: 1.6 $
  7. **    $Date: 90/11/02 $
  8. **
  9. **    Include file for Input/Output related structures
  10. **
  11. **    (C) Copyright 1986,1987,1988,1989,1990 William S. Hawes.
  12. **        All Rights Reserved
  13. **
  14.  
  15.      IFND      REXX_STORAGE_I
  16.      INCLUDE  "rexx/storage.i"
  17.      ENDC
  18.  
  19. RXBUFFSZ EQU      204               ; buffer length
  20.  
  21. * The IoBuff is a resource node used to maintain the File List.  Nodes are
  22. * allocated and linked into the list whenever a file is opened.
  23.  
  24.      STRUCTURE IoBuff,RRSIZEOF     ; structure for files/strings
  25.      APTR      iobRpt           ; read/write pointer
  26.      LONG      iobRct           ; character count
  27.      LONG      iobDFH           ; DOS filehandle
  28.      APTR      iobLock           ; DOS lock
  29.      LONG      iobBct           ; buffer length
  30.      STRUCT   iobArea,RXBUFFSZ     ; buffer area
  31.      LABEL      iobSIZEOF           ; size: 256 bytes
  32.  
  33. IOBNAME  EQU      LN_NAME           ; logical name
  34. IOBMODE  EQU      rr_Arg1           ; access mode
  35. IOBEOF     EQU      rr_Arg1+1           ; EOF flag
  36. IOBPOS     EQU      rr_Arg2           ; current position
  37.  
  38. * Access mode definitions
  39. RXIO_EXIST  EQU      -1           ; an existing filehandle
  40. RXIO_STRF   EQU      0               ; a "string file"
  41. RXIO_READ   EQU      1               ; read-only access
  42. RXIO_WRITE  EQU      2               ; write mode
  43. RXIO_APPEND EQU      3               ; append mode (existing file)
  44.  
  45. * Offset anchors for SeekF()
  46. RXIO_BEGIN  EQU      -1           ; relative to start
  47. RXIO_CURR   EQU      0               ; relative to current position
  48. RXIO_END    EQU      1               ; relative to end
  49.  
  50. * The Library List contains just plain resource nodes.
  51. LLOFFSET EQU      rr_Arg1           ; "Query" offset
  52. LLVERS     EQU      rr_Arg2           ; library version
  53.  
  54. * The RexxClipNode structure is used to maintain the Clip List.  The
  55. * value string is stored as an argstring in the rr_Arg1 field.
  56. CLVALUE  EQU      rr_Arg1           ; value string
  57.  
  58. * A message port structure, maintained as a resource node.
  59. * The ReplyList holds packets that have been received but haven't been
  60. * replied.
  61.  
  62.          STRUCTURE RexxMsgPort,RRSIZEOF
  63.          STRUCT   rmp_Port,MP_SIZE           ; the message port
  64.          STRUCT   rmp_ReplyList,LH_SIZE      ; messages awaiting reply
  65.          LABEL    rmp_SIZEOF
  66.  
  67. * Device types
  68. DT_DEV   EQU      0                    ; a device
  69. DT_DIR   EQU      1                    ; an ASSIGNed directory
  70. DT_VOL   EQU      2                    ; a volume
  71.  
  72. * Private packet types
  73. ACTION_STACK   EQU   2002              ; stack a line
  74. ACTION_QUEUE   EQU   2003              ; queue a line
  75.  
  76.          ENDC
  77.